home *** CD-ROM | disk | FTP | other *** search
/ Armageddon - Interactive Preview / Interactive Preview: Armageddon.iso / pc / control.dxr / Scripts & Behaviors_20_M1 Behavior.ls < prev    next >
Encoding:
Text File  |  1998-05-19  |  272 b   |  12 lines

  1. property pThisSprite, pStartCast
  2.  
  3. on new me
  4.   set pThisSprite to the currentSpriteNum
  5.   set pStartCast to the memberNum of sprite pThisSprite
  6. end
  7.  
  8. on exitFrame me
  9.   set randomValue to random(4) - 1
  10.   set the memberNum of sprite pThisSprite to pStartCast + randomValue
  11. end
  12.